

## COMPLETE
variables <- list(
            RiotStudy=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"),	
		    Synchrony=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                  , "MatrixSolving1"),
          	   German=c("UnscrambleWords1", "BrainstormObject1", "TypingText1"           ),
         Technion2016=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                  , "MatrixSolving1"),
              MBA2012=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                                       ),
            XvalStudy=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"),
 T1T2CrowdflowerJoint=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                  , "MatrixSolving1"),
                Kiwon=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"),
 CMUGenderStatusStudy=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                  , "MatrixSolving1"),
		 Technion2015=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                  , "MatrixSolving1"),
		 Technion2017=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                                      ),
              MBA2015=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                  , "MatrixSolving1"),
              MBA2014=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                  , "MatrixSolving1"),
          	      USC=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"),	
          	 FortSill=c("UnscrambleWords1", "BrainstormObject1", "TypingText1"           ),	
T1T2CrowdflowerRound1=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                  , "MatrixSolving1"),
        T1T2CMUSO2013=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                  , "MatrixSolving1"),
	             Bots=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"),
        T1T2CMUSO2015=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                  , "MatrixSolving1"),
	     TilburgStudy=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                  ),
          Hopkins2015=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                  , "MatrixSolving1"),
	      Hopkins2016=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1")
)

